home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Loadstar 97
/
097.d81
/
circuitry boot
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-08-26
|
563b
|
12 lines
5 poke53281,0:poke53280,0:print"[144][147]";:poke648,204:print"[147]";
7 dv=peek(186):ifdv<8thendv=8
10 sys57812"f.circuitry a",dv,0:poke780,0:poke781,0:poke782,232:sys65493
11 sys57812"f.circuitry l",dv,0:poke780,0:poke781,0:poke782,248:sys65493
12 poke56578,peek(56578)or3:poke56576,peek(56576)and252:poke53272,58
13 sys57812"tricks.o",dv,0:poke780,0:poke781,0:poke782,4:sys65493
20 sys57812"csid player",dv,0:poke780,0:poke781,0:poke782,192:sys65493
30 sys57812"obj.circuitry",dv,0:poke780,0:poke781,0:poke782,128:sys65493
40 f$="circuitry":print"[147][144]load f$,"dv
50 print"run":print"":poke198,2:poke631,13:poke632,13:end
60000 open15,8,15,"s0:circuitry boot":close15:save"circuitry boot",8